home *** CD-ROM | disk | FTP | other *** search
/ MacFormat 1995 July / macformat-026.iso / mac / Shareware City / Graphics / PS2EPS+ 1.0 Folder / GS / PS / VPS_init.ps < prev   
Encoding:
Text File  |  1993-01-22  |  543 b   |  34 lines  |  [TEXT/R*ch]
  1. VPSxll VPSyll translate
  2. /showpage {} def
  3. /setpacking {pop} def
  4.  
  5. /md_6 where
  6. {
  7.     pop
  8.     /=print { pop } def
  9.     /flushfile { pop { currentfile read pop 107 eq {exit} if } loop } def
  10. } if
  11.  
  12. /md_7 where
  13. {
  14.     pop
  15.     /=print { pop } def
  16.     /patchOK true def
  17. } if
  18.  
  19. errordict begin
  20.   /handleerror
  21.    { (%%[ Error: ) print
  22.      $error begin
  23.        errorname ==only flush
  24.        (; OffendingCommand: ) print
  25.        /command load ==only
  26.        ( ]%%) print
  27.        (\n) print
  28.        /newerror false def
  29.      end
  30.      flush
  31.      .instopped {stop} if
  32.    } bind def
  33. end
  34.